home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 38 / Amiga Format CD38 (1999-03-15)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-04].iso / -screenplay- / shareware / wreckage / source / assembly / backup / asm_3d_al.asm < prev    next >
Assembly Source File  |  1999-02-08  |  506b  |  35 lines
  1.       CLR.w d0
  2. _asm3d_1:
  3.     MOVE.b    (a0)+    ,d0    ;app
  4.     MOVE.l     (a1)+    ,d1    ;x
  5.     MOVE.l     (a2)+    ,d2         ;z
  6.     MOVE.l     (a3)+    ,d3         ;y
  7.     
  8.     TST.b    d0
  9.     BEQ    _asm3d_2
  10.     
  11. ;    ASR.l     #8    ,d3    
  12. ;    ASR.l    #8    ,d3
  13.     CLR.w    d3
  14.     SWAP    d3
  15.     EXT.l    d3
  16.     TST.l     d3
  17.     BLE     _asm3d_2
  18.     
  19.     DIVS.l    d3    ,d1
  20.     ASL.l     #7    ,d1
  21.     DIVS.l    d3    ,d2
  22.     ASL.l    #7    ,d2
  23.     BRA    _asm3d_2a
  24.     
  25.         
  26. _asm3d_2:
  27.     CLR.w d0
  28. _asm3d_2a:
  29.     MOVE.l     d1    ,(a4)+    ;sx
  30.      MOVE.l     d2    ,(a4)+        ;sy
  31.       MOVE.w     d0    ,(a4)+        ;app
  32.       SUBQ.l     #1    ,d7           ;points-1
  33.       BGT     _asm3d_1           ;until points<=0
  34.  
  35.